﻿Public Class DataBaseTable

    Public Sub New()
    End Sub

    Public Sub New(ByVal aTableName As String)
        Me.TableName = aTableName
        TableColumnsList = New List(Of DataBaseTableColumn)
    End Sub

    Private _tableName As String
    Public Property TableName() As String
        Get
            TableName = _tableName
        End Get
        Set(ByVal Value As String)
            _tableName = Value
        End Set
    End Property

    Private _classNamespace As String
    Public Property ClassNamespace() As String
        Get
            ClassNamespace = _classNamespace
        End Get
        Set(ByVal Value As String)
            _classNamespace = Value
        End Set
    End Property

    Private aTableColumnList As List(Of DataBaseTableColumn)
    Public Property TableColumnsList() As List(Of DataBaseTableColumn)
        Get
            TableColumnsList = aTableColumnList
        End Get
        Set(ByVal Value As List(Of DataBaseTableColumn))
            aTableColumnList = Value
        End Set
    End Property

End Class
